|
700
|
How can I change the shape of the task bar
with AxG2antt1 do
begin
with Chart.Bars.Copy('Task','T2') do
begin
StartShape := EXG2ANTTLib.ShapeCornerEnum.exShapeIconDown1;
StartColor := $ff;
end;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'T2','1/2/2001','1/4/2001',Nil,Nil);
AddBar(AddItem('Item 2'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
699
|
How can I change the starting shape for all task bars
with AxG2antt1 do
begin
with Chart.Bars.Item['Task'] do
begin
StartShape := EXG2ANTTLib.ShapeCornerEnum.exShapeIconUp1;
StartColor := $ff;
end;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
698
|
How can I change the height of the task bar
with AxG2antt1 do
begin
Chart.Bars.Copy('Task','T2').Height := 17;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'T2','1/2/2001','1/4/2001',Nil,Nil);
AddBar(AddItem('Item 2'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
697
|
How can I change the height for all task bars
with AxG2antt1 do
begin
Chart.Bars.Item['Task'].Height := 17;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
696
|
How can I change the color of the task bar
with AxG2antt1 do
begin
Chart.Bars.Copy('Task','T2').Color := $ff;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'T2','1/2/2001','1/4/2001',Nil,Nil);
AddBar(AddItem('Item 2'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
695
|
How can I change the color for all task bars
with AxG2antt1 do
begin
Chart.Bars.Item['Task'].Color := $ff;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
694
|
How can I change the shape for all task bars
with AxG2antt1 do
begin
Chart.Bars.Item['Task'].Shape := EXG2ANTTLib.ShapeBarEnum.exShapeSolidDown;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
693
|
How can I change the shape of the task bar
with AxG2antt1 do
begin
Chart.Bars.Copy('Task','T2').Shape := EXG2ANTTLib.ShapeBarEnum.exShapeThinCenter;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'T2','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
692
|
How can I change the pattern or style for all task bars
with AxG2antt1 do
begin
Chart.Bars.Item['Task'].Pattern := EXG2ANTTLib.PatternEnum.exPatternFDiagonal;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
691
|
How can I change the pattern of the task bar
with AxG2antt1 do
begin
Chart.Bars.Copy('Task','T2').Pattern := EXG2ANTTLib.PatternEnum.exPatternFDiagonal;
Chart.FirstVisibleDate := '1/1/2001';
Columns.Add('Column');
with Items do
begin
AddBar(AddItem('Item 1'),'T2','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
690
|
How can I add a percent bar in the chart area, so the task bar is splited for non working days or hours
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.Bars.Add('Task%Progress:Split').Shortcut := 'TS';
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'TS','1/2/2001','1/16/2001','P1',Nil);
ItemBar[h,'P1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.14);
ItemBar[h,'P1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
end;
end
|
|
689
|
How can I add a bar in the chart area, so the task bar is splited for non working days or hours
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.Bars.Add('Task:Split').Shortcut := 'TS';
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'TS','1/2/2001','1/16/2001',Nil,Nil);
end;
end
|
|
688
|
How can I add a split bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Split','1/2/2001','1/6/2001',Nil,Nil);
end;
end
|
|
687
|
How can I add a progress bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Progress','1/2/2001','1/6/2001',Nil,Nil);
end;
end
|
|
686
|
How can I add a milestone bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Milestone','1/2/2001','1/2/2001',Nil,Nil);
end;
end
|
|
685
|
How can I add a summary bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Summary','1/2/2001','1/6/2001',Nil,Nil);
end;
end
|
|
684
|
How can I add a project summary bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Project Summary','1/2/2001','1/6/2001',Nil,Nil);
end;
end
|
|
683
|
How can I add a deadline bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Deadline','1/2/2001','1/2/2001',Nil,Nil);
end;
end
|
|
682
|
How can I add a task bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
681
|
How can I assign a picture or an icon to a bar in the chart
with AxG2antt1 do
begin
set_HTMLPicture('p1','c:\exontrol\images\zipdisk.gif');
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
ItemHeight[h] := 48;
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<img>p1</img>';
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarHAlignCaption] := TObject(2);
end;
end
|
|
680
|
How can I assign a picture or an icon to a bar in the chart
with AxG2antt1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<img>1</img>';
end;
end
|
|
679
|
How can I display or add an anchor or a hyperlink in the link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
AddItem('');
AddItem('');
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := 'just <a1>link</a>';
end;
end
|
|
678
|
How can I display a picture or an icon on the link
with AxG2antt1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
AddItem('');
AddItem('');
AddItem('');
AddItem('');
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := 'just <img>1</img> link';
end;
end
|
|
677
|
How can I display a picture or an icon on the link
with AxG2antt1 do
begin
set_HTMLPicture('pic1','c:\exontrol\images\zipdisk.gif');
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
AddItem('');
AddItem('');
AddItem('');
AddItem('');
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := '<img>pic1</img><br><br>just a link';
end;
end
|
|
676
|
How can I display some HTML text or caption on link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := 'L<b>1</b>';
end;
end
|
|
675
|
How can I assign a tooltip to a link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := 'L<b>1</b>';
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkToolTip] := 'This is a bit of text that''s shown when the cursor hovers the link';
end;
end
|
|
674
|
Can I change the width or the size of the link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStyle] := TObject(0);
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkWidth] := TObject(2);
end;
end
|
|
673
|
Can I change the style of the link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStyle] := TObject(4);
end;
end
|
|
672
|
Can I change the color of the link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkColor] := TObject(255);
end;
end
|
|
671
|
Can I change the part of the bar where the link ends
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStartPos] := TObject(1);
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkEndPos] := TObject(1);
end;
end
|
|
670
|
Can I change the part of the bar where the link starts
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStartPos] := TObject(0);
end;
end
|
|
669
|
How can I associate an extra data to a link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkUserData] := 'your data';
end;
end
|
|
668
|
How can I show or hide a specified link
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkEndBar] := TObject(False);
end;
end
|
|
667
|
How can I get the key of the bar where the link end
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
AddItem(Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkEndBar]);
end;
end
|
|
666
|
How can I get the key of the bar where the link starts
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
AddItem(Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStartBar]);
end;
end
|
|
665
|
How can I get the handle of the item where the link ends
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
AddItem(Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkEndItem]);
end;
end
|
|
664
|
How can I get the handle of the item where the link starts
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
AddItem(Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkStartItem]);
end;
end
|
|
663
|
How can I enumerate the links in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
AddLink('L2',h2,'K2',h1,'K1');
AddItem(FirstLink);
AddItem(NextLink[FirstLink]);
end;
end
|
|
662
|
How can I access the properties and method of the link between two bars
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/1/2001','1/3/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
Link['L1',EXG2ANTTLib.LinkPropertyEnum.exLinkText] := 'L<b>1</b>';
end;
end
|
|
661
|
How can I remove a link between two bars
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
ClearLinks();
end;
end
|
|
660
|
How can I remove a link between two bars
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
RemoveLink('L1');
end;
end
|
|
659
|
How do I add a link between two bars
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
AddLink('L1',h1,'K1',h2,'K2');
end;
end
|
|
658
|
How do I ungroup the bars in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
GroupBars(h1,'K1',True,h2,'K2',True,Nil,Nil);
GroupBars(h1,'K1',False,h2,'K2',False,Nil,Nil);
UngroupBars(h1,'K1',h2,'K2');
end;
end
|
|
657
|
How do I group one or more bars in the chart, so they are moved together
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h1 := AddItem('Task 1');
AddBar(h1,'Task','1/2/2001','1/4/2001','K1',Nil);
h2 := AddItem('Task 2');
AddBar(h2,'Task','1/5/2001','1/7/2001','K2',Nil);
GroupBars(h1,'K1',True,h2,'K2',True,Nil,Nil);
GroupBars(h1,'K1',False,h2,'K2',False,Nil,Nil);
end;
end
|
|
656
|
How do I find the number or count of bars in the item
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/1/2001','1/2/2001','K1',Nil);
AddBar(h,'Task','1/4/2001','1/6/2001','K2',Nil);
ItemBar[h,'K2',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := ItemBar[h,'<*>',EXG2ANTTLib.ItemBarPropertyEnum.exBarsCount];
end;
end
|
|
655
|
How can I assign any extra data to a bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarData] := 'your data';
end;
end
|
|
654
|
How can I enable or disable resizing the percent value of a progress bar, at runtime
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.35);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanResizePercent] := TObject(False);
end;
end
|
|
653
|
Is there any way to change the background color for percent value being displayed on the progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.35);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercentCaptionFormat] := '<bgcolor=FF0000> %p%</bgcolor>';
end;
end
|
|
652
|
Is there any way to change the color for percent value being displayed on the progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.35);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercentCaptionFormat] := '<fgcolor=FF0000>%p%</fgcolor>';
end;
end
|
|
651
|
Is there any way to change the font for percent value being displayed on the progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.35);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercentCaptionFormat] := '<b><font Tahoma;12>%%p</font></b>';
end;
end
|
|
650
|
How can I horizontally align the caption / percent of a progress-bar
with AxG2antt1 do
begin
BeginUpdate();
Columns.Add('Task');
with Chart do
begin
LevelCount := 2;
PaneWidth[False] := 128;
FirstVisibleDate := '1/1/2001';
with Bars.Add('Task%Progress') do
begin
Shortcut := 'Percent';
Def[EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
Def[EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(1);
end;
end;
with Items do
begin
h := AddItem('Left');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(0);
h := AddItem('Center');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(1);
h := AddItem('Right');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(2);
h := AddItem('Left');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(0);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.5);
h := AddItem('Center');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.5);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(1);
h := AddItem('Right');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarAlignPercentCaption] := TObject(2);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.5);
end;
EndUpdate();
end
|
|
649
|
Is there any way to change the format of the percent being displayed on the progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.4);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercentCaptionFormat] := '<b>%p/100</b>';
end;
end
|
|
648
|
How can I show or hide the percent value in the progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.4);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
end;
end
|
|
647
|
How can I change the percent value in a progress bar
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Add('Task%Progress').Shortcut := 'Percent';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Percent','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.4);
end;
end
|
|
646
|
How can I add a percent bar
// BarResize event - Occurs when a bar is moved or resized.
procedure TWinForm1.AxG2antt1_BarResize(sender: System.Object; e: AxEXG2ANTTLib._IG2anttEvents_BarResizeEvent);
begin
with AxG2antt1 do
begin
OutputDebugString( e.key );
end
end;
with AxG2antt1 do
begin
BeginUpdate();
Columns.Add('Task');
with Chart do
begin
LevelCount := 2;
FirstVisibleDate := '1/1/2001';
PaneWidth[False] := 64;
with Bars.Add('Task%Progress') do
begin
Shortcut := 'P';
Def[EXG2ANTTLib.ItemBarPropertyEnum.exBarShowPercentCaption] := TObject(True);
end;
end;
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'P','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.4);
h := AddItem('Task 2');
AddBar(h,'Task%Progress','1/2/2001','1/6/2001','K2',Nil);
ItemBar[h,'K2',EXG2ANTTLib.ItemBarPropertyEnum.exBarPercent] := TObject(0.15);
end;
EndUpdate();
end
|
|
645
|
How can I fix or lock a specified bar at runtime, in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanResize] := TObject(False);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanMove] := TObject(False);
end;
end
|
|
644
|
How can I enabled or disable moving a specified bar at runtime, in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanResize] := TObject(False);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanMove] := TObject(False);
end;
end
|
|
643
|
How can I enabled or disable sizing a specified bar at runtime, in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCanResize] := TObject(False);
end;
end
|
|
642
|
How can I change the key of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarKey] := 'NewK';
ItemBar[h,'NewK',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := ItemBar[h,'NewK',EXG2ANTTLib.ItemBarPropertyEnum.exBarKey];
end;
end
|
|
641
|
Can I add a bar in the chart, using your EBN files
with AxG2antt1 do
begin
VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'','1/2/2001','1/5/2001','K1',' EBN ');
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarBackColor] := TObject(16777216);
AddBar(h,'Task','1/6/2001','1/8/2001','K2',Nil);
end;
end
|
|
640
|
How can I change the background color of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.Bars.Copy('Task','TaskR').Color := $ff;
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'TaskR','1/2/2001','1/6/2001','K1',Nil);
end;
end
|
|
639
|
How can I change the background color of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
Chart.ShowNonworkingDates := False;
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarBackColor] := TObject(8421504);
end;
end
|
|
638
|
How can I change the background color of the HTML text or caption of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<bgcolor=FF0000> to do </bgcolor>';
end;
end
|
|
637
|
How can I change the foreground color of the HTML text or caption of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1','t<fgcolor=0000FF>o</fgcolor> do');
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarForeColor] := TObject(16777215);
end;
end
|
|
636
|
How can I change the foreground color of the HTML text or caption of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<bgcolor=FF0000> to do </bgcolor>';
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarForeColor] := TObject(16777215);
end;
end
|
|
635
|
How can I assign a tooltip to a bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarToolTip] := 'This is a bit of text that''s displayed when the cursor hovers the bar';
end;
end
|
|
634
|
How can I vertically align the HTML text or caption of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
ItemHeight[h] := 32;
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<bgcolor=FF0000> to do </bgcolor>';
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarVAlignCaption] := TObject(0);
end;
end
|
|
633
|
How can I align the HTML text or caption of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := '<bgcolor=FF0000> to do </bgcolor>';
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarHAlignCaption] := TObject(0);
end;
end
|
|
632
|
How can I assign a text or some HTML caption to a bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/6/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarCaption] := ' <bgcolor=FF0000>to do</bgcolor> ';
end;
end
|
|
631
|
How can I change the ending date of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarEnd] := '1/6/2001';
end;
end
|
|
630
|
How can I change the starting date of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarStart] := '1/1/2001';
end;
end
|
|
629
|
How can I change the style or the name of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarName] := 'Progress';
end;
end
|
|
628
|
How can I access properties and methods of the bar in the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ItemBar[h,'K1',EXG2ANTTLib.ItemBarPropertyEnum.exBarName] := 'Progress';
end;
end
|
|
627
|
How can I remove all bars in the item
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
ClearBars(h);
end;
end
|
|
626
|
How can I remove a bar from the chart
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
h := AddItem('Task 1');
AddBar(h,'Task','1/2/2001','1/4/2001','K1',Nil);
RemoveBar(h,'K1');
end;
end
|
|
625
|
How can I add a bar and some text inside, in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Task','1/2/2001','1/6/2001',Nil,' to do ');
end;
end
|
|
624
|
How can I add a bar and some text inside, in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Task','1/2/2001','1/6/2001',Nil,'<bgcolor=FF0000> to do </bgcolor>');
end;
end
|
|
623
|
How can I add an anchor or a hyperline in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'','1/2/2001','1/14/2001',Nil,'just a <a1>link</a>');
end;
end
|
|
622
|
How can I add some text or captions in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'','1/2/2001','1/14/2001',Nil,'just a <b>caption</b>');
end;
end
|
|
621
|
How can I add a bar in the chart area
with AxG2antt1 do
begin
Columns.Add('Task');
Chart.FirstVisibleDate := '1/1/2001';
with Items do
begin
AddBar(AddItem('Task 1'),'Task','1/2/2001','1/4/2001',Nil,Nil);
end;
end
|
|
620
|
Is there any option to put a picture or an icon to the thumb part of the scroll bar
with AxG2antt1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
set_ScrollPartCaption(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,EXG2ANTTLib.ScrollPartEnum.exThumbPart,'<img>1</img>');
set_ScrollThumbSize(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,24);
end
|
|
619
|
How can I scroll fast the chart, or page by page
with AxG2antt1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
ScrollHeight := 20;
ScrollButtonWidth := 20;
AllowChartScrollPage := True;
set_ScrollPartCaption(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,EXG2ANTTLib.ScrollPartEnum.exLeftB5Part,'<img>1</img>');
set_ScrollPartCaption(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,EXG2ANTTLib.ScrollPartEnum.exRightB1Part,'<img>2</img>');
end
|
|
618
|
How can I scroll fast the chart, or page by page
with AxG2antt1 do
begin
ScrollButtonWidth := 16;
AllowChartScrollPage := True;
set_ScrollPartCaption(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,EXG2ANTTLib.ScrollPartEnum.exLeftB5Part,'<<');
set_ScrollPartCaption(EXG2ANTTLib.ScrollBarEnum.exHChartScroll,EXG2ANTTLib.ScrollPartEnum.exRightB1Part,'>>');
end
|
|
617
|
How can I scroll fast the chart, or page by page
with AxG2antt1 do
begin
AllowChartScrollPage := True;
end
|
|
616
|
How can I display years, from 3 to 3
with AxG2antt1 do
begin
Chart.UnitWidth := 64;
with Chart.Level[0] do
begin
Label := '<%yyyy%>';
Unit := EXG2ANTTLib.UnitEnum.exYear;
Count := 3;
end;
end
|
|
615
|
How can I display years
with AxG2antt1 do
begin
Chart.UnitWidth := 64;
with Chart.Level[0] do
begin
Label := '<%yy%>';
Unit := EXG2ANTTLib.UnitEnum.exYear;
end;
end
|
|
614
|
How can I display years
with AxG2antt1 do
begin
Chart.UnitWidth := 48;
Chart.Level[0].Label := TObject(0);
end
|
|
613
|
How can I display months, from 3 to 3
with AxG2antt1 do
begin
Chart.FirstVisibleDate := '1/1/2001';
Chart.LevelCount := 2;
Chart.UnitWidth := 64;
Chart.Level[0].Label := TObject(1);
with Chart.Level[1] do
begin
Label := '<%mmmm%>';
Unit := EXG2ANTTLib.UnitEnum.exMonth;
Count := 3;
end;
end
|
|
612
|
How can I display months
with AxG2antt1 do
begin
Chart.UnitWidth := 64;
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(1);
with Chart.Level[1] do
begin
Label := '<%mmmm%>/<%yy%>';
Unit := EXG2ANTTLib.UnitEnum.exMonth;
end;
end
|
|
611
|
How can I display months
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.UnitWidth := 64;
Chart.Level[0].Label := TObject(1);
Chart.Level[1].Label := TObject(16);
end
|
|
610
|
How can I display weeks
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.UnitWidth := 64;
Chart.Level[0].Label := TObject(17);
Chart.Level[1].Label := TObject(256);
end
|
|
609
|
How can I display weeks
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(17);
Chart.Level[1].Label := '<%ww%>';
end
|
|
608
|
How can I display days, from 2 to 2
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(256);
with Chart.Level[1] do
begin
Label := '<%dd%>';
Count := 2;
end;
end
|
|
607
|
How can I display days
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(256);
Chart.Level[1].Label := '<%dd%>';
end
|
|
606
|
How can I display days
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(256);
Chart.Level[1].Label := TObject(4096);
end
|
|
605
|
How can I display hours, from 6 to 6
with AxG2antt1 do
begin
Chart.FirstVisibleDate := '00:00';
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(4096);
with Chart.Level[1] do
begin
Label := '<%hh%>';
Count := 6;
end;
end
|
|
604
|
How can I display hours
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(4096);
Chart.Level[1].Label := '<%hh%>';
end
|
|
603
|
How can I display hours
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(4096);
Chart.Level[1].Label := TObject(65536);
end
|
|
602
|
How can I display minutes, from 15 to 15
with AxG2antt1 do
begin
Chart.FirstVisibleDate := '00:00';
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(65536);
with Chart.Level[1] do
begin
Label := '<%nn%>';
Count := 15;
end;
end
|
|
601
|
How can I display minutes
with AxG2antt1 do
begin
Chart.LevelCount := 2;
Chart.Level[0].Label := TObject(65536);
Chart.Level[1].Label := '<%nn%>';
end
|